<Security.Permissions.ReflectionPermission(Security.Permissions.SecurityAction.Deny)> _
Friend Class SQLAutoDocLicense
    Inherits License

    Private Const msID As String = "jcomsqlautodocjl"

    Public Sub New()
        MyBase.New(msID)
    End Sub

    Public Function Encrypt(ByVal sValue As String) As String
        Dim oJCO As New JCO.Crypt(msID, False)

        Return oJCO.Encrypt(sValue)
    End Function

    Public Function Decrypt(ByVal sValue As String) As String
        Dim oJCO As New JCO.Crypt(msID, False)

        Return oJCO.Decrypt(sValue)
    End Function
End Class
